home *** CD-ROM | disk | FTP | other *** search
/ Aminet 2 / Aminet AMIGA CDROM (1994)(Walnut Creek)[Feb 1994][W.O. 44790-1].iso / Aminet / gfx / opal / JOpalIF.lha / OpalReq.f < prev    next >
Text File  |  1993-01-01  |  455b  |  23 lines
  1. \ JForth Language Interface for OpalVision's OpalReq.Library
  2. \
  3. \ Version 1.0 - 31 December 1992
  4. \
  5. \ By Marlin Schwanke
  6.  
  7. include? OpalReq ji:opal/opalreqlib.j
  8.  
  9. ANEW TASK-OPALREQ
  10.  
  11. \ JForth Amiga shared library words
  12.  
  13. :Library opalreq
  14. : opalreq? ( -- ) opalreq_NAME opalreq_LIB lib? ;
  15. : -opalreq ( -- ) opalreq_LIB -lib ;
  16.  
  17. \ OpalReq library call
  18.  
  19. : OpalRequester ( OpalReq -- Result )
  20. \ The OpalVision file requester.
  21.    call>abs opalreq_LIB OpalRequester
  22. ;
  23.